home *** CD-ROM | disk | FTP | other *** search
-
- LISTVIEW.proc 1.4 - by Rolf Rotvel
-
- DESCRIPTION:
- A listview procedure for your Arexx scripts.
-
- INSTALLATION
- Include it your Arexx scripts :-)
-
- USAGE
- num = listview(width, height, titletext)
-
- The stem variable, viewline, must have the following format:
- viewline.0 = number of elements
- viewline.1 = first element
- viewline.2 = second element...
-
- Returns number of selected element or 0 if requester was cancelled.
-
- Have a look at util/rexx/cliped33.lha for an example of how to use the
- listview procedure.
-
- NAVIGATING LISTVIEW
- Use cursor or shift-cursor keys to move up and down.
- Return selects an item and escape quits without selecting anything.
-
- If anyone has a way of detecting the use of ctrl as a qualifier then
- please tell me. I'd really like to use ctrl-cursorup/down to move to the
- top or bottom of the list.
-
- PROGRAMMING NOTE
- It's fairly easy to make the listview respond to the HELP being pressed.
- Change the main loop like this:
-
- do forever
- oldrow = row ; oldvar = var
- char = readch('listwin', 1)
- select
- when char = csi then do
- char = readch('listwin', 2)
- select
- when char = '?~' then do
- <help stuff>
- end
- ...
-
- CREDITS
- Thanks to Preben Nielsen for SCREENINFO() procedure.
- And to Rick Younie's cy 1.1 for inspiration.
-
- COPYRIGHT
- No copyright. Do whatever you want with this.
-
- DISCLAIMER
- It's your fault :-)
-
- AUTHOR
- Please send any comments or suggestions to me. I can be reached at
- 2:238/38.0@fidonet or 39:140/110.0@amiganet. Email: rolf@hoa.ping.dk
-
- HISTORY:
- 1.4 - First release
-